﻿Public Class CheckForm
    Public Shared Function check(ByVal value As Object, ByVal dataTypeTo As String) As Boolean
        Select Case dataTypeTo
            Case DATA_TYPE.DATA_TYPE_int
                Try
                    Integer.Parse(value)
                Catch ex As Exception
                    Return False
                End Try
        End Select
        Return True
    End Function

End Class
